object frSAME_SCH_PO_ABON: TfrSAME_SCH_PO_ABON
  Left = 0
  Top = 0
  BorderStyle = bsDialog
  ClientHeight = 217
  ClientWidth = 728
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'Tahoma'
  Font.Style = []
  KeyPreview = True
  OldCreateOrder = False
  Position = poMainFormCenter
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 13
  object pTable: TPanel
    Left = 0
    Top = 0
    Width = 728
    Height = 195
    Align = alClient
    TabOrder = 0
    object sgSAME_SCH: TDBGrid
      AlignWithMargins = True
      Left = 4
      Top = 4
      Width = 720
      Height = 187
      Align = alClient
      DataSource = dsSAME_SCH
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = 'Tahoma'
      Font.Style = []
      ParentFont = False
      ReadOnly = True
      TabOrder = 0
      TitleFont.Charset = DEFAULT_CHARSET
      TitleFont.Color = clWindowText
      TitleFont.Height = -11
      TitleFont.Name = 'Tahoma'
      TitleFont.Style = []
      Columns = <
        item
          Expanded = False
          FieldName = 'NOM_ABON'
          Title.Caption = #1053#1086#1084#1077#1088' '#1072#1073#1086#1085#1077#1085#1090#1072
          Width = 98
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'FIO'
          Title.Caption = #1060#1048#1054
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'MARKA'
          Title.Caption = #1052#1072#1088#1082#1072
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'MODEL'
          Title.Caption = #1052#1086#1076#1077#1083#1100
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'ZAV_NOM'
          Title.Caption = #1047#1072#1074'. '#1085#1086#1084#1077#1088
          Visible = True
        end>
    end
  end
  object pEdit: TPanel
    Left = 0
    Top = 195
    Width = 728
    Height = 22
    Align = alBottom
    TabOrder = 1
  end
  object ActionList1: TActionList
    Left = 691
    Top = 54
    object ESC: TAction
      Caption = 'ESC'
      ShortCut = 27
      OnExecute = ESCExecute
    end
  end
  object dsetSAME_SCH: TIBCQuery
    Connection = dmOne.IBDBOne
    SQL.Strings = (
      
        'select s.nom_abon, sa.fio, s.kod_sht, sp.marka, sp.model, s.zav_' +
        'nom'
      'from shethik s, spr_abon sa, sp_schet sp'
      'where s.kod_sht=:KOD_SCH'
      'and s.zav_nom=:ZAV_NOM'
      'and s.nom_abon=sa.nom_abon'
      'and sp.kod_sht=s.kod_sht'
      'and s.status='#39'+'#39)
    Left = 657
    Top = 11
    ParamData = <
      item
        DataType = ftUnknown
        Name = 'KOD_SCH'
      end
      item
        DataType = ftUnknown
        Name = 'ZAV_NOM'
      end>
  end
  object dsSAME_SCH: TIBCDataSource
    DataSet = dsetSAME_SCH
    Left = 687
    Top = 11
  end
end
